home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 44
/
Aminet 44 (2001)(GTI - Schatztruhe)[!][Aug 2001].iso
/
Aminet
/
dev
/
gui
/
gtlayout.lha
/
Source
/
LTP_Delay.c
< prev
next >
Wrap
C/C++ Source or Header
|
1999-01-02
|
1KB
|
56 lines
/*
** GadTools layout toolkit
**
** Copyright © 1993-1999 by Olaf `Olsen' Barthel
** Freely distributable.
**
** :ts=4
*/
#ifndef _GTLAYOUT_GLOBAL_H
#include "gtlayout_global.h"
#endif
/*****************************************************************************/
#include <devices/timer.h>
#include <clib/alib_protos.h> /* For NewList */
/*****************************************************************************/
#include "Assert.h"
VOID
LTP_Delay(ULONG Seconds,ULONG Micros)
{
struct MsgPort TimePort;
struct timerequest TimeRequest;
memset(&TimePort,0,sizeof(TimePort));
NewList(&TimePort.mp_MsgList);
TimePort.mp_Flags = PA_SIGNAL;
TimePort.mp_SigBit = SIGB_SINGLE;
TimePort.mp_SigTask = FindTask(NULL);
memset(&TimeRequest,0,sizeof(TimeRequest));
TimeRequest.tr_node.io_Message.mn_ReplyPort = &TimePort;
TimeRequest.tr_node.io_Message.mn_Length = sizeof(struct timerequest);
if(!OpenDevice(TIMERNAME,UNIT_VBLANK,&TimeRequest,NULL))
{
TimeRequest.tr_node.io_Command = TR_ADDREQUEST;
TimeRequest.tr_time.tv_secs = Seconds;
TimeRequest.tr_time.tv_micro = Micros;
SetSignal(0,SIGF_SINGLE);
SendIO(&TimeRequest);
WaitIO(&TimeRequest);
CloseDevice(&TimeRequest);
}
}